powered by
pen.type(object)<-value
object
pen.type<--methods
x=new("cpt") # new cpt object pen.type(x)<-"SIC" # replaces the existing pen.type slot in x with "SIC"
Run the code above in your browser using DataLab